home *** CD-ROM | disk | FTP | other *** search
/ AMIGA-CD 2 / Amiga-CD - Volume 2.iso / ungepackte_daten / 1992 / 09 / 2 / window-machine / wm_source.ampk / WM_Error.c < prev    next >
Encoding:
C/C++ Source or Header  |  1995-06-01  |  2.7 KB  |  84 lines
  1. #include <WM.h>
  2.  
  3. USHORT Error(UBYTE string,UBYTE fo,UBYTE wa)
  4. {
  5.     struct Window *w;
  6.     UBYTE OK=TRUE;
  7.  
  8. UBYTE error[][70] = {
  9.     "Nicht genug freier Speicher ! Speichererweiterung kaufen !",
  10.     "DISK - ERROR",
  11.     "Wirklich löschen ? Daten sind noch nicht gesichert !",
  12.     "WM-Daten sind nicht gesichert ! Soll ich trotzdem Laden ?",
  13.     "Hoppla !!!  Das war aber kein WM-File !",
  14.     "Damit geht das Window mit allem Drum und Dran verloren !",
  15.     "Damit geht der Screen mit allem Drum und Dran verloren !",
  16.     "Wollen Sie die Window-Maschine wirklich verlassen ?",
  17.     "WM-Daten sind nicht gesichert, WM trotzdem verlassen ?",
  18.     "Soll ich wirklich alles löschen ???",
  19.     "Dieses Directory existiert nicht !",
  20.     "Wollen Sie das Gadget wirklich entfernen ?",
  21.     "Wollen Sie das Border wirklich entfernen ?",
  22.     "Es ist kein Border vorhanden !",
  23.     "Es ist kein Image vorhanden !",
  24.     "Diese Funktion ist nur bei BOOLGADGET möglich !",
  25.     "Propgadgets haben ein eigenes Border !",
  26.     "Bitte gewünschtes Gadget im aktuellem Window anklicken !",
  27.     "Das ist kein einzelnes Window, bitte 'WM-Daten laden' wählen !",
  28.     "Damit geht das Menü mit all seinen Item's und SubItem's verloren !",
  29.     "Wollen Sie wirklich die ganze Menüleiste entfernen ?",
  30.     "Damit geht das Item mit all seinen SubItem's verloren !",
  31.     "Wollen Sie das SubItem wirklich entfernen ?",
  32.     "Intuition verwaltet nicht mehr als 31 Menü's !!!",
  33.     "Intuition verwaltet pro Menü nicht mehr als 63 Item's !!!",
  34.     "Intuition verwaltet pro Menü-Item nicht mehr als 31 SubItem's !!!",
  35.     "BODY - CHUNK nicht gefunden !!!",
  36.     "Tut mir leid, aber das ist kein IFF-File !!!",
  37.     "Dieses IFF-File enthält leider keine Farbwerte !",
  38.     "Bitte gewünschtes Window aktivieren !",
  39.     "Der active Screen ist zu klein, kann Palette-Window nicht öffnen !",
  40.     "BMHD - CHUNK nicht gefunden !!!",
  41.     "Wollen Sie wirklich den gesamten Requester entfernen ?",
  42.     "Soll der System-Requester wirklich gelöscht werden ?",
  43.     "Soll ich den Alert wirklich entfernen ?",
  44.     "Wollen Sie das Image wirklich entfernen ?",
  45.     "Wollen Sie den Text wirklich entfernen ?"
  46. };
  47.     if(!wa && Warning) return(1);
  48.     strcpy(Buffer,error[string]);
  49.     if(string==1)
  50.     {
  51.         sprintf(LEER," %d !!!",IoErr());
  52.         BuffLeer();
  53.     }
  54.     ETXT.IText=Buffer;
  55.     ETXT.LeftEdge=(640-IntuiTextLength(&ETXT)) >> 1;
  56.     ScreenToFront(WMsc);
  57.     ErrWindow.Screen=WMsc;
  58.     if(!(w=(struct Window *)OpenWindow(&ErrWindow))) return(3);
  59.     WinBorder(w);
  60.     PrintIText(w->RPort,&ETXT,0,0);
  61.     SetAPen(w->RPort,1);
  62.     SetDrMd(w->RPort,COMPLEMENT);
  63.     time=0;
  64.     do
  65.     {
  66.             Wait(1L << w->UserPort->mp_SigBit);
  67.             GetMessage(w);
  68.             if(class==GADGETUP) OK=FALSE;
  69.             if(class==INTUITICKS)
  70.             {
  71.                 time++;
  72.                 if(time == 10)
  73.                 {
  74.                     time=0;
  75.                     RectFill(w->RPort,6,3,633,46);
  76.                 }
  77.             }
  78.     } while(OK);
  79.     CloseWindow(w);
  80.     if(fo) ScreenToFront(sc);
  81.     return((USHORT)Id);
  82. }
  83.  
  84.